% checkprt.tex -- by Frank Neukam  (06 Jun 1992)

\typeout{}
\typeout{*** checkprt.tex V1.0 by Frank Neukam <06 Jun 1992> ***}
\typeout{}
\documentstyle{script_s}
\pagestyle{empty}

\textwidth 210mm
\textheight 297mm
\oddsidemargin -1in
\evensidemargin -1in
\marginparwidth 0in
\marginparsep 0in
\topmargin -1in
\headheight 0in
\headsep 0in
\footheight 0in
\footskip 0in
\topskip 0in
\parindent 0in

\begin{document}
\scriptsize\sf
\newcounter{unitcnt}
\setlength{\unitlength}{1sp}
\begin{picture}(0,0)
\put(9323400,-27690498){\line(1,0){20511480}}
\put(19579140,-9323400){\line(0,-1){36734196}}
%
% left
%  mm
\multiput(186468,-27690498)(186468,0){50}{\line(0,1){372936}}
\multiput(932340,-27690498)(932340,0){10}{\line(0,1){559404}}
\multiput(1864680,-27690498)(1864680,0){5}{\line(0,1){745872}}
\setcounter{unitcnt}{10}
\multiput(1864680,-26571690)(1864680,0){5}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{10}}
\put(10255740,-27354856){mm}
%  inch
\multiput(236815,-27690498)(236815,0){40}{\line(0,-1){372936}}
\multiput(473629,-27690498)(473629,0){20}{\line(0,-1){559404}}
\multiput(4736290,-27690498)(4736290,0){2}{\line(0,-1){745872}}
\setcounter{unitcnt}{1}
\multiput(4736290,-28809306)(4736290,0){2}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{1}}
\put(10255740,-28343136){inch}
%
% right
%  mm
\multiput(38971812,-27690498)(-186468,0){50}{\line(0,1){372936}}
\multiput(38225940,-27690498)(-932340,0){10}{\line(0,1){559404}}
\multiput(37293600,-27690498)(-1864680,0){5}{\line(0,1){745872}}
\setcounter{unitcnt}{10}
\multiput(37293600,-26571690)(-1864680,0){5}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{10}}
\put(27932906,-27354856){mm}
%  inch
\multiput(38921465,-27690498)(-236815,0){40}{\line(0,-1){372936}}
\multiput(38684651,-27690498)(-473629,0){20}{\line(0,-1){559404}}
\multiput(34421990,-27690498)(-4736290,0){2}{\line(0,-1){745872}}
\setcounter{unitcnt}{1}
\multiput(34421990,-28809306)(-4736290,0){2}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{1}}
\put(27932906,-28343136){inch}
%
% top
%  mm
\multiput(19579140,-186468)(0,-186468){50}{\line(-1,0){372936}}
\multiput(19579140,-932340)(0,-932340){10}{\line(-1,0){559404}}
\multiput(19579140,-1864680)(0,-1864680){5}{\line(-1,0){745872}}
\setcounter{unitcnt}{10}
\multiput(18460332,-1864680)(0,-1864680){5}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{10}}
\put(18460332,-10442208){\makebox(0,0)[b]{mm}}
%  inch
\multiput(19579140,-236815)(0,-236815){40}{\line(1,0){372936}}
\multiput(19579140,-473629)(0,-473629){20}{\line(1,0){559404}}
\multiput(19579140,-4736290)(0,-4736290){2}{\line(1,0){745872}}
\setcounter{unitcnt}{1}
\multiput(20697948,-4736290)(0,-4736290){2}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{1}}
\put(20697948,-10442208){\makebox(0,0)[b]{inch}}
%
% bottom
%  mm
\multiput(19579140,-55194528)(0,186468){50}{\line(-1,0){372936}}
\multiput(19579140,-54448656)(0,932340){10}{\line(-1,0){559404}}
\multiput(19579140,-53516316)(0,1864680){5}{\line(-1,0){745872}}
\setcounter{unitcnt}{10}
\multiput(18460332,-53516316)(0,1864680){5}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{10}}
\put(18460332,-45311724){\makebox(0,0)[b]{mm}}
%  inch
\multiput(19579140,-55144181)(0,236815){40}{\line(1,0){372936}}
\multiput(19579140,-54907367)(0,473629){20}{\line(1,0){559404}}
\multiput(19579140,-50644706)(0,4736290){2}{\line(1,0){745872}}
\setcounter{unitcnt}{1}
\multiput(20697948,-50644706)(0,4736290){2}%
 {\makebox(0,0){\arabic{unitcnt}}\addtocounter{unitcnt}{1}}
\put(20697948,-45311724){\makebox(0,0)[b]{inch}}
\end{picture}
\end{document}

